;; The first four lines of this file were added by Dracula.
;; They tell DrScheme that this is a Dracula Modular ACL2 program.
;; Leave these lines unchanged so that DrScheme can properly load this file.
#reader(planet "reader.rkt" ("cce" "dracula.plt") "modular" "lang")
(require "mbmptree.lisp")
(require "mavltree.lisp")
(require "mhelpers.lisp")
(require "mcolorshift.lisp")
(require "mgreyscale.lisp")
(require "mhuechange.lisp")
(require "mborder.lisp")
(require "mcrop.lisp")
(require "mhipstafy.lisp")
(require "mmirroring.lisp")
(require "mphotonegative.lisp")
(require "mrotate.lisp")
(require "mresize.lisp")
(require "mio.lisp")
(require "mdatagenerators.lisp")

; Testing command:
; (tree->binary-file tree outputfilename)
; Example:
; (tree->binary-file (greyscale (make-tree "logo.bmp")) "logo-grey.bmp")

; RUN:
; (main filename)
; Example:
; (main "logo.txt")

(link Rmain (Mavltree Mbmptree Mdatagenerators Mcolorshift Mhelpers Mhuechange Mgreyscale Mhipstafy
             Mmirroring Mrotate MBorder Mcrop Mphotonegative Mresize Mio))
(invoke Rmain)
